home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d8 / t3script.arc / BBNOTES.SLT < prev    next >
Encoding:
Text File  |  1990-04-14  |  55.4 KB  |  1,620 lines
  1. /////////////////////////////////////////////////////////////////////////
  2. //          BBNOTES.SLT  -  by Terry Robertson (October 1988)          //
  3. // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ //
  4. //                                                                     //
  5. //  This script holds further details of the UK bulletin boards which  //
  6. //  are included in my Dialling Directory UKBBTEL3.FON. It contains    //
  7. //  the following information:                                         //
  8. //                  The name of each board's SysOp                     //
  9. //                  Netmail Node number where applicable               //
  10. //                  Operating hours                                    //
  11. //                  An area for notes on each board                    //
  12. //                                                                     //
  13. //  The format of this file is fairly self-explanatory. If you want    //
  14. //  to alter any of the information or to enter your own notes, simply //
  15. //  go to the DATA AREA and make your changes. The "#" markers at the  //
  16. //  top of that section indicate where the various fields start and    //
  17. //  end. You must keep each line the same length as the samples and    //
  18. //  each line must end in a ";".                                       //
  19. //                                                                     //
  20. //  This script is most useful when it is "attached" to a function key //
  21. //  so that it may be called up quickly when required.                 //
  22. //                                                                     //
  23. /////////////////////////////////////////////////////////////////////////
  24.  
  25.  
  26.  
  27.  
  28.  
  29. str entry[10]  = "ENTRY No. ";
  30. str sysop[34]  = "SYSOP'S NAME   ";
  31. str node[22]   = "NETMAIL NODE   ";
  32. str wdhrs[24]  = "WEEKDAY HOURS  ";
  33. str wehrs[24]  = "WEEKEND HOURS  ";
  34. str notes[51]  = "OTHER NOTES    ";
  35.  
  36. str exit[]     = "To exit press escape or enter";
  37.  
  38. str sname[19];
  39. str snode[7];
  40. str swdhrs[9];
  41. str swehrs[9];
  42. str snotes[36];
  43. str data[80];
  44.  
  45. str dnum[3];
  46. str endc[1];
  47.  
  48. ////////////////////////////////  DATA AREA  ////////////////////////////////////////////////////
  49. //                                                HOURS                                         /
  50. //////////////// #   SYSOP'S NAME   # NODE #  WKDAY # WKEND  #  NOTES                           #
  51.  
  52. str data1[]   = "Tony Miller        None   2100-100024Hrs    Amiga/ST/BBC                        ";
  53. str data2[]   = "Ric Beck           None   2200-08002200-0800                                    ";
  54. str data3[]   = "Joe Brouillard     None   24 Hrs   24 Hrs   US SysOp. Huge file base            ";
  55. str data4[]   = "John Kelly         None   24 Hrs   24 Hrs   PC/BBC/Atari. Area for OU students  ";
  56. str data5[]   = "Paul Camilleri     None   2200-09002200-0900Mainly ST. Atlas Computer Supplies  ";
  57. str data6[]   = "Eric Sparrow       257/8  Offline  24 Hrs   TRS/BBC/PC/CPM                      ";
  58. str data7[]   = "Adrian Pop         258/23 24 Hrs   24 Hrs   Most machines supported             ";
  59. str data8[]   = "Jon Brooks         None   24 Hrs   24 Hrs   Subscription for full access        ";
  60. str data9[]   = "Alan Solomon       254/29 24 Hrs   24 Hrs   PC oriented. Famous problem clinic  ";
  61. str data10[]  = "David Jupe         None   1900-2100Offline                                      ";
  62. str data12[]  = "Jeremy Goslin      None   2300-08002300-0800Mainly ST                           ";
  63. str data13[]  = "Robert Walker      None   24 Hrs   24 Hrs   BBC/CBM/Amstrad                     ";
  64. str data14[]  = "Keith Bloom        None   1800-080024 Hrs   Amiga oriented                      ";
  65. str data18[]  = "Mike Jones         None   24 Hrs   24 Hrs   Apple support                       ";
  66. str data19[]  = "Tom Todd           None   24 Hrs   24 Hrs   PC/Amstrad PCW                      ";
  67. str data20[]  = "David Joyce        None   1800-080024 Hrs                                       ";
  68. str data21[]  = "Andrew Stephens    None   24 Hrs   24 Hrs   The Emperor's Board                 ";
  69. str data22[]  = "Graham Denham      253/94 24 Hrs   24 Hrs   Radioactivity monitoring            ";
  70. str data23[]  = "James Bastable     None   24 Hrs   24 Hrs   Mainly Atari 8-bit machines         ";
  71. str data24[]  = "Tony Moran         None   24 Hrs   24 Hrs                                       ";
  72. str data25[]  = "Dave Gorski        None   24 Hrs   24 Hrs   Amstrad/Spectrum                    ";
  73. str data26[]  = "Stephen Baird      259/6  24 Hrs   24 Hrs   ST oriented                         ";
  74. str data27[]  = "John Krzesinski    253/19224 Hrs   24 Hrs   Apricot Technical Support BB/PC     ";
  75. str data29[]  = "Anthony Carr-Smith None   24 Hrs   24 Hrs                                       ";
  76. str data30[]  = "Tony Game          None   24 Hrs   24 Hrs                                       ";
  77. str data31[]  = "Nik Middleton      253/11424 Hrs   24 Hrs   Two lines. UK Net co-ordinator      ";
  78. str data32[]  = "Darren Soothill    None   24 Hrs   24 Hrs                                       ";
  79. str data33[]  = "John Barton        254/1681930-080024 Hrs                                       ";
  80. str data34[]  = "Graham Butler      257/52 24 Hrs   24 Hrs   Mainly PC                           ";
  81. str data35[]  = "Bill Weir          None   Offline  Offline  Mainly PC                           ";
  82. str data36[]  = "Jon Dunster        251/10124 Hrs   24 Hrs   OS9 Support/PC/ST/Dragon/Amstrad    ";
  83. str data37[]  = "Andy Shears        258/14 24 Hrs   24 Hrs                                       ";
  84. str data39[]  = "Hugh Allan         None   24 Hrs   24 Hrs                                       ";
  85. str data40[]  = "Mike Montgomery    None   24 Hrs   24 Hrs   ST/Amiga/PC                         ";
  86. str data41[]  = "Terry Dansy        None   24 Hrs   24 Hrs                                       ";
  87. str data42[]  = "Bob Baal           258/3  24 Hrs   24 Hrs                                       ";
  88. str data43[]  = "Henry McAleer      None   24 Hrs   24 Hrs   Medical topics                      ";
  89. str data45[]  = "Jeremy Browne      None   24 Hrs   24 Hrs   Brit Osborne Owners Club/PC/ST/CPM  ";
  90. str data46[]  = "S Hussein          None   24 Hrs   24 Hrs   BBC oriented                        ";
  91. str data47[]  = "Stewart Roberts    257/17724 Hrs   24 Hrs                                       ";
  92. str data48[]  = "Jim Hamilton       None   24 Hrs   24 Hrs                                       ";
  93. str data49[]  = "Mike McAree        253/1881900-070024 Hrs                                       ";
  94. str data50[]  = "Paul Fletcher      None   24 Hrs   24 Hrs                                       ";
  95. str data51[]  = "Noel Bradford      None   24 Hrs   24 Hrs   Mainly PC                           ";
  96. str data52[]  = "Mike Rouse         None   24 Hrs   24 Hrs   PC/ST/Amiga                         ";
  97. str data53[]  = "Mike Langensiepen  None   1800-090024 Hrs   PC/Amiga                            ";
  98. str data54[]  = "Nik Middleton      None   24 Hrs   24 Hrs                                       ";
  99. str data55[]  = "Martin Fleming     None   24 Hrs   24 Hrs   Mainly ST                           ";
  100. str data56[]  = "Steve Thomas       None   1800-080024 Hrs   Welsh for Wild Cat                  ";
  101. str data57[]  = "Mike Corby         253/27 24 Hrs   24 Hrs   PC/ST/BBC/Mac/CPM/Amstrad           ";
  102. str data58[]  = "Mick Coleman       None   24 Hrs   24 Hrs   Atari oriented                      ";
  103. str data59[]  = "Steve Adams        None   24 Hrs   24 Hrs   Mainly Spectrum                     ";
  104. str data60[]  = "Martin Huelin      252/15124 Hrs   24 Hrs   PC/BBC/CPM                          ";
  105. str data61[]  = "Lindsay Reid       257/2  24 Hrs   24 Hrs   386cpu with 130MB disk storage      ";
  106. str data63[]  = "Paul Shenton       258/42 1900-090024 Hrs   PC/ST/Amiga/BBC/CPM                 ";
  107. str data64[]  = "Colin Earl         None   24 Hrs   24 Hrs   PC/BBC/Atari/Amstrad PCW            ";
  108. str data65[]  = "Frank Thornley     None   24 Hrs   24 Hrs   Conferencing; Subscription required ";
  109. str data66[]  = "Clara Jane Hoare   255/11 24 Hrs   24 Hrs                                       ";
  110. str data67[]  = "Howard Grahame     None   24 Hrs   24 Hrs   PC/Amstrad/BBC/CBM/Amiga/Atari      ";
  111. str data68[]  = "Grant McDonald     None   2000-090024 Hrs                                       ";
  112. str data69[]  = "Len Burch          254/16524 Hrs   24 Hrs                                       ";
  113. str data70[]  = "John Mileham       254/16324 Hrs   24 Hrs                                       ";
  114. str data71[]  = "Geoff Wade         254/16724 Hrs   24 Hrs   PC/BBC                              ";
  115. str data72[]  = "Frank Dent         254/16624 Hrs   24 Hrs                                       ";
  116. str data73[]  = "Mike Tew           254/83 24 Hrs   24 Hrs   PC/BBC                              ";
  117. str data74[]  = "Peter Bowyer       257/17624 Hrs   24 Hrs                                       ";
  118. str data75[]  = "David Melville     253/11124 Hrs   24 Hrs                                       ";
  119. str data76[]  = "Robin Lamming      None   2400-08002100-0800                                    ";
  120. str data77[]  = "Felix Harrigan     254/12824 Hrs   24 Hrs                                       ";
  121. str data78[]  = "Daren Ingram       None   24 Hrs   24 Hrs                                       ";
  122. str data79[]  = "Peter Catley       None   24 Hrs   24 Hrs   Runs CPM library                    ";
  123. str data80[]  = "Steve Carter       None   1900-07001900-0700                                    ";
  124. str data81[]  = "Not Known          None   24 Hrs   24 Hrs   General interest/Apple/PC           ";
  125. str data82[]  = "Andy Clark         253/19 24 Hrs   24 Hrs                                       ";
  126. str data84[]  = "Simon Meldrum      None   24 Hrs   24 Hrs                                       ";
  127. str data85[]  = "S Thurlassingham   None   24 Hrs   24 Hrs   PC/Atari/CPM                        ";
  128. str data86[]  = "Leroy McFarlane    254/9  24 Hrs   24 Hrs                                       ";
  129. str data87[]  = "Paul Swift         None   24 Hrs   24 Hrs   Datatalk support/PC/Amiga/CPM       ";
  130. str data88[]  = "John Wilson        257/5  24 Hrs   24 Hrs   Formerly Northampton Castle         ";
  131. str data89[]  = "Dave Pucknell      258/43 24 Hrs   24 Hrs                                       ";
  132. str data90[]  = "Richard Bowles     None   1600-083024 Hrs                                       ";
  133. str data91[]  = "Bob Catt           257/88 24 Hrs   24 Hrs   DEC oriented/PC                     ";
  134. str data92[]  = "Gareth McLean      None   24 Hrs   24 Hrs   Subscription for full access/PC     ";
  135. str data93[]  = "Paul Hughes        253/18524 Hrs   24 Hrs   Apple/PC                            ";
  136. str data94[]  = "John Balshaw       None   24 Hrs   24 Hrs   ST/BBC/PC/Amstrad/Amiga/CBM         ";
  137. str data95[]  = "Clive Warner       None   24 Hrs   24 Hrs   PC/ST/Amstrad PCW                   ";
  138. str data96[]  = "Steve Manners      None   24 Hrs   24 Hrs   PC oriented                         ";
  139. str data97[]  = "Chris Cain         251/1942200-180024 Hrs                                       ";
  140. str data98[]  = "Martin Brown       None   24 Hrs   24 Hrs                                       ";
  141. str data99[]  = "Craig Evenson      None   24 Hrs   24 Hrs   BBC/PC                              ";
  142. str data100[] = "Eddie Seymour      253/15224 Hrs   24 Hrs   PC/ST/Amiga/BBC                     ";
  143. str data101[] = "The Ambassador     None   24 Hrs   24 Hrs   PC-Plus support/PC                  ";
  144. str data102[] = "Not Known          None   24 Hrs   24 Hrs                                       ";
  145. str data103[] = "Scott Andrew       295/5  24 Hrs   24 Hrs                                       ";
  146. str data104[] = "Richard Brumpton   None   24 Hrs   24 Hrs                                       ";
  147. str data106[] = "Steve Dibble       None   2200-08002200-0800Amstrad oriented                    ";
  148. str data107[] = "Carl Wright        None   24 Hrs   24 Hrs   Subscription for full access/Archie ";
  149. str data108[] = "Alan Walker        258/1  24 Hrs   24 Hrs   Amstrad/PC/CPM/TRS/BBC/ST/Mac       ";
  150. str data109[] = "Andrew Oldham      None   24 Hrs   24 Hrs   Mainly PC                           ";
  151. str data110[] = "Theo Harper        255/1212200-080024 Hrs                                       ";
  152. str data111[] = "Andrew Flatman     None   24 Hrs   24 Hrs   Mainly PC                           ";
  153. str data112[] = "Rod Smallwood      255/33 24 Hrs   24 Hrs   Mainly PC                           ";
  154. str data113[] = "Phil Crewe         253/20324 Hrs   24 Hrs                                       ";
  155. str data114[] = "Steven Bernhardt   None   24 Hrs   24 Hrs   Mainly PC                           ";
  156. str data115[] = "Dan Butterworth    None   24 Hrs   24 Hrs                                       ";
  157. str data116[] = "Quentin Wright     None   24 Hrs   24 Hrs   PC/BBC/TRS                          ";
  158. str data118[] = "Barry Freeman      None   24 Hrs   24 Hrs   Subscription for full access/ST/PC  ";
  159. str data119[] = "Ritchie Dakin      257/17524 Hrs   24 Hrs   Mainly PC                           ";
  160. str data120[] = "Simon Gamble       253/11224 Hrs   24 Hrs   Leave Terry Robertson a message here";
  161. str data121[] = "Stephen Cole       251/10 24 Hrs   24 Hrs   PC/ST/Dragon/Apple/Amstrad/Amiga    ";
  162. str data122[] = "Bob Campion        None   24 Hrs   24 Hrs   Horticultural advice                ";
  163. str data123[] = "Ian Strachan       None   24 Hrs   24 Hrs   PC/BBC/Atari/Eazilink support       ";
  164. str data124[] = "Ernest Francis     None   1900-24001900-0300                                    ";
  165. str data126[] = "Malcolm Robins     251/19024 Hrs   24 Hrs                                       ";
  166. str data127[] = "Joe Lawrence       None   1800-080024 Hrs   Ham radio featured                  ";
  167. str data128[] = "Colin Crawford     None   24 Hrs   24 Hrs   Mainly PC                           ";
  168. str data129[] = "Gerald Janes       254/16924 Hrs   24 Hrs   PCWorld comms editor/PC             ";
  169. str data130[] = "Hilary Henshaw-HaasNone   2000-080024 Hrs   Mainly Amstrad                      ";
  170. str data131[] = "Not Known          None   2100-24002100-2400Spectrum oriented                   ";
  171. str data132[] = "Julian Anderson    None   2000-070024 Hrs   BBC/Amstrad/CBM                     ";
  172. str data133[] = "John Dibnah        None   1900-110024 Hrs                                       ";
  173. str data134[] = "David Rance        253/11024 Hrs   24 Hrs   Christian BB/Amstrad/Archi/ST/PC/BBC";
  174. str data135[] = "Milo Phonebill     None   24 Hrs   24 Hrs                                       ";
  175. str data136[] = "Carl Ricketts      None   24 Hrs   24 Hrs   PC/Mac/Amiga/CPM                    ";
  176. str data137[] = "Mohamed Salleh     None   24 Hrs   24 Hrs   Amstrad oriented                    ";
  177. str data138[] = "Jumbo              None   24 Hrs   24 Hrs                                       ";
  178. str data139[] = "Hugh Ashbourne     252/3  24 Hrs   24 Hrs   PC/CPM/BBC/CBM/Apple/Mac            ";
  179. str data140[] = "Jamie Thompson     None   24 Hrs   24 Hrs                                       ";
  180. str data141[] = "John Ferrier       None   24 Hrs   24 Hrs   PC/ST/CBM/BBC/Spectrum              ";
  181. str data143[] = "Roger Seaward      None   24 Hrs   24 Hrs   TRS/PC/Apple/BBC/Atari              ";
  182. str data144[] = "David Thorpe       253/19124 Hrs   24 Hrs   Mainly PC                           ";
  183. str data145[] = "Gary Round         None   24 Hrs   Offline                                      ";
  184. str data146[] = "David Mather       251/19124 Hrs   24 Hrs   PC/Apple                            ";
  185. str data147[] = "Dave Randle        255/12424 Hrs   24 Hrs   PC/ST/BBC/CPM                       ";
  186. str data148[] = "Ron Meldrum        None   2000-08002000-0800                                    ";
  187. str data149[] = "Nick Piggott       None   24 Hrs   24 Hrs   Radio feature                       ";
  188. str data150[] = "John Fanchamps     None   2200-08002200-0800PC/ST                               ";
  189. str data151[] = "Kleo Hofton        None   1900-07001900-0700BBC/ST                              ";
  190. str data152[] = "Andrew Eaves       257/17124 Hrs   24 Hrs   Mainly PC. Previously Andrew's Opus ";
  191. str data154[] = "Arthur McBryan     253/19324 Hrs   24 Hrs   PC/Amstrad PCW/Charity users        ";
  192. str data155[] = "John Hein          None   24 Hrs   24 Hrs   Gay oriented                        ";
  193. str data156[] = "Various Sysops     None   24 Hrs   24 Hrs                                       ";
  194. str data157[] = "John Lambon        251/15624 Hrs   24 Hrs   PC/BBC/ST                           ";
  195. str data158[] = "Mark Glennon       256/25 24 Hrs   24 Hrs                                       ";
  196. str data159[] = "Tim Pugh           None   24 Hrs   24 Hrs   PC/ST                               ";
  197. str data160[] = "Not Known          None   24 Hrs   24 Hrs                                       ";
  198. str data161[] = "Sonny Horsfall     None   24 Hrs   24 Hrs   PC/Leeds E-Mail                     ";
  199. str data162[] = "Richard Davis      None   24 Hrs   24 Hrs   ST/Amstrad/CBM/QL/BBC/PC/Spectrum   ";
  200. str data163[] = "Peter Tootill      255/71 24 Hrs   24 Hrs   TRS/Atari/PC. UK TBBS HQ            ";
  201. str data164[] = "John Rawson        256/97 24 Hrs   24 Hrs   Amstrad/TRS/CPM/PC                  ";
  202. str data165[] = "John Bone          256/17 24 Hrs   24 Hrs   CPM/BBC/TRS/PC                      ";
  203. str data166[] = "Daniel Wilder      254/16224 Hrs   24 Hrs                                       ";
  204. str data167[] = "Kevin Mathews      None   24 Hrs   24 Hrs   Subscription required               ";
  205. str data168[] = "Mike Simkins       254/81 24 Hrs   24 Hrs   PC/CPM                              ";
  206. str data169[] = "Terry Sinclair     None   24 Hrs   24 Hrs   Amiga/Atari/BBC/PC                  ";
  207. str data170[] = "David Daines       254/20024 Hrs   24 Hrs                                       ";
  208. str data171[] = "Brian Robinson     None   24 Hrs   24 Hrs   Subscription only/Mainly PC         ";
  209. str data173[] = "Mike Conway        None   24 Hrs   24 Hrs   ST oriented                         ";
  210. str data174[] = "Clive Waller       258/12 24 Hrs   24 Hrs   Atari/BBC/CPM/PC/Amstrad/TRS        ";
  211. str data175[] = "Mark Caro          None   24 Hrs   24 Hrs   Amiga bias/PC/BBC                   ";
  212. str data176[] = "David Nicholsoncole253/20024 Hrs   24 Hrs   Mac oriented                        ";
  213. str data178[] = "John Lockwood      253/20224 Hrs   24 Hrs   Mac oriented                        ";
  214. str data179[] = "Paul Beaumont      253/20124 Hrs   24 Hrs   Mac oriented                        ";
  215. str data180[] = "David Harper       259/1  24 Hrs   24 Hrs   Education oriented/PC/BBC           ";
  216. str data181[] = "Peter Rodda        None   24 Hrs   24 Hrs   Amiga/ST/CBM                        ";
  217. str data182[] = "Yehuda Simmons     None   24 Hrs   24 Hrs                                       ";
  218. str data183[] = "Marcus Anselm      None   24 Hrs   24 Hrs   FBBS HQ                             ";
  219. str data184[] = "Not Known          None   24 Hrs   24 Hrs                                       ";
  220. str data185[] = "Len Payne          None   24 Hrs   24 Hrs                                       ";
  221. str data186[] = "Mark Kollins       252/13624 Hrs   24 Hrs                                       ";
  222. str data187[] = "Peter Wilby        None   24 Hrs   24 Hrs                                       ";
  223. str data188[] = "Ken Farren         None   24 Hrs   24 Hrs   TRS/Atari/CBM/Apple/Mac/PC          ";
  224. str data189[] = "Martin Taylor      None   24 Hrs   24 Hrs   PC/CPM                              ";
  225. str data190[] = "Martin Newham      None   24 Hrs   24 Hrs   ST/BBC/Amiga/Amstrad/PC/CBM         ";
  226. str data191[] = "Terry Ebdon        None   24 Hrs   24 Hrs                                       ";
  227. str data192[] = "Brian Benster      256/14 24 Hrs   24 Hrs   PC/BBC/Amstrad                      ";
  228. str data193[] = "Phillip Crookes    None   24 Hrs   24 Hrs   Home of Merkin and his cronies      ";
  229. str data194[] = "Ian Gregson        None   24 Hrs   24 Hrs   Mainly PC                           ";
  230. str data195[] = "David Watkins      None   24 Hrs   24 Hrs                                       ";
  231. str data196[] = "Jeremy Chappell    None   24 Hrs   24 Hrs   ST/Amiga                            ";
  232. str data197[] = "Martin Holt        None   24 Hrs   24 Hrs   PC/CPM/BBC                          ";
  233. str data198[] = "Tom Goodfellow     None   24 Hrs   24 Hrs   ST oriented                         ";
  234. str data199[] = "Not Known          None   24 Hrs   24 Hrs   Incorporates BBODY                  ";
  235. str data200[] = "Paul Sengupta      None   24 Hrs   24 Hrs                                       ";
  236. str data201[] = "Paul Mansell       None   1900-070024 Hrs   BBC oriented                        ";
  237. str data202[] = "Lee Evans          255/18 24 Hrs   24 Hrs   Mirror II support BB                ";
  238. str data203[] = "David Pager        None   1800-090024 Hrs                                       ";
  239. str data204[] = "Pip Cordrey        None   24 Hrs   24 Hrs   Multi-user games                    ";
  240. str data205[] = "Pip Cordrey        None   24 Hrs   24 Hrs   Multi-user games                    ";
  241. str data206[] = "Mark Hammond       None   2100-08002100-0800ST oriented                         ";
  242. str data207[] = "Mike Gove          257/17324 Hrs   24 Hrs   PC oriented                         ";
  243. str data208[] = "Not Known          None   24 Hrs   24 Hrs                                       ";
  244. str data209[] = "Jerry Cheung       None   0700-23000700-2300BBC/CBM                             ";
  245. str data210[] = "Jeremy Gumbley     None   2200-08002200-0800                                    ";
  246. str data211[] = "James Eckhardt     None   24 Hrs   24 Hrs                                       ";
  247. str data212[] = "James Lawson       None   24 Hrs   24 Hrs                                       ";
  248. str data213[] = "D Zargel           None   24 Hrs   24 Hrs                                       ";
  249. str data214[] = "William Holmes     None   24 Hrs   24 Hrs                                       ";
  250. str data215[] = "Steven Matthews    None   24 Hrs   24 Hrs   ACMB HQ                             ";
  251. str data216[] = "Richard Braggs     253/12224 Hrs   24 Hrs                                       ";
  252. str data217[] = "Tim Gray           None   2200-07002200-0700                                    ";
  253. str data218[] = "Mike Wigmore       258/4  24 Hrs   24 Hrs   ST/PC/CPM/BBC/Amiga                 ";
  254. str data219[] = "Den Deans          256/61 24 Hrs   24 Hrs   PC oriented                         ";
  255. str data220[] = "Robert O'Donnell   None   24 Hrs   24 Hrs   Mainly BBC                          ";
  256. str data221[] = "James Willmott     None   24 Hrs   24 Hrs   BBC/Archie/PC                       ";
  257. str data222[] = "Marek Paul         None   24 Hrs   24 Hrs   PC/CPM                              ";
  258. str data223[] = "Charles Tame       None   2100-07002100-0700Amiga bias                          ";
  259. str data224[] = "David McKendrick   255/64 24 Hrs   24 Hrs   Medical topics                      ";
  260. str data225[] = "Alex Comerford     None   24 Hrs   24 Hrs                                       ";
  261. str data226[] = "John Taylor        253/68 24 Hrs   24 Hrs   PC oriented                         ";
  262. str data227[] = "Ben Knox           None   24 Hrs   24 Hrs   Conferencing; Subscription required ";
  263. str data228[] = "Simon Lowe         None   2000-08002000-0800                                    ";
  264. str data229[] = "Iain Philipps      258/21 24 Hrs   24 Hrs   Source of PC-Sig software           ";
  265. str data230[] = "Iain Philipps      258/2  24 Hrs   24 Hrs   Source of PC-Sig software           ";
  266. str data231[] = "Brian Hicks        254/15 24 Hrs   24 Hrs   Source of PC-Sig software           ";
  267. str data232[] = "Rod Smith          None   24 Hrs   24 Hrs   Source of PC-Sig software           ";
  268. str data233[] = "Paul Jarrett       None   1800-08001800-0800                                    ";
  269. str data234[] = "Peter Smith        258/31 24 Hrs   24 Hrs   Mainly PC                           ";
  270. str data235[] = "Ade Truelove       None   24 Hrs   24 Hrs   ST/PC/Atari/Source of good BB list  ";
  271. str data236[] = "Danny Thomas       None   24 Hrs   24 Hrs   Features pirate radio               ";
  272. str data237[] = "Tony Jowers        None   24 Hrs   24 Hrs   Amiga/ST/BBC                        ";
  273. str data238[] = "Dave Russell       None   1800-21301800-2130Einstein bias                       ";
  274. str data239[] = "Mel Warwick        253/93 24 Hrs   24 Hrs   PC/ST                               ";
  275. str data240[] = "Dave Laycock       254/11 24 Hrs   24 Hrs                                       ";
  276. str data241[] = "David Reid         259/3  2000-090024 Hrs                                       ";
  277. str data242[] = "Jim Bates          None   24 Hrs   24 Hrs                                       ";
  278. str data243[] = "Bert Ilsley        None   24 Hrs   24 Hrs   PC/BBC/Atari/ST/Amiga               ";
  279. str data244[] = "Alan Kirk          252/15024 Hrs   24 Hrs   PC/ST/BBC                           ";
  280. str data245[] = "Roger Booth        256/16424 Hrs   24 Hrs                                       ";
  281. str data246[] = "Ian Crocker        None   24 Hrs   24 Hrs   PC oriented                         ";
  282. str data247[] = "Llewellyn Fawr     None   1900-070024 Hrs   PC/BBC                              ";
  283. str data248[] = "Kenneth Comden     251/19824 Hrs   24 Hrs                                       ";
  284. str data249[] = "Phil Burden        253/18724 Hrs   24 Hrs   PC/Source of good BB list           ";
  285. str data250[] = "Not Known          None   24 Hrs   24 Hrs                                       ";
  286. str data251[] = "Boyd Hitchcock     None   24 Hrs   24 Hrs   BBC/CPM/TRS/Amstrad/Atari/Spectrum  ";
  287. str data252[] = "Noel Gaddo         None   24 Hrs   24 Hrs   Specialises in CBM                  ";
  288. str data253[] = "Andy Inman         None   24 Hrs   24 Hrs   ST oriented                         ";
  289. str data254[] = "George Fleming     259/4  24 Hrs   24 Hrs   Mainly PC                           ";
  290. str data255[] = "Donald Whannell    259/2  24 Hrs   24 Hrs   ST/Amstrad/PC/BBC/TRS               ";
  291. str data256[] = "Jim McNulty        259/7  24 Hrs   24 Hrs   PC/Amiga/BBC/Atari/CPM              ";
  292. str data257[] = "Robert Bowman      254/34 24 Hrs   24 Hrs   PC/Psion                            ";
  293. str data258[] = "Simon Rowe         251/23 24 Hrs   24 Hrs                                       ";
  294. str data259[] = "Steve Underwood    None   24 Hrs   24 Hrs                                       ";
  295. str data260[] = "Steve Townsley     254/17 24 Hrs   24 Hrs   Procomm-Plus support BB             ";
  296. str data261[] = "Kevin Lindley      None   24 Hrs   24 Hrs   PC/ST/BBC/Archie/Amstrad/Amiga      ";
  297. str data262[] = "Bob Tyler          None   24 Hrs   24 Hrs   BBC/ST/PC/Amiga                     ";
  298. str data263[] = "Ben Humphrey       None   24 Hrs   24 Hrs                                       ";
  299. str data264[] = "John Bolton        258/22 24 Hrs   24 Hrs                                       ";
  300. str data265[] = "Gary Tanner        259/8  24 Hrs   24 Hrs                                       ";
  301. str data266[] = "Lucien Oppler      None   24 Hrs   24 Hrs                                       ";
  302. str data267[] = "Archie Clark       251/19224 Hrs   24 Hrs   Amiga bias                          ";
  303. str data268[] = "Mark Evans         None   2230-08002230-0800                                    ";
  304. str data269[] = "Stephen Page       None   24 Hrs   24 Hrs   ST bias                             ";
  305. str data270[] = "John Gough         None   24 Hrs   24 Hrs   ST/Amiga/Archie/PC                  ";
  306. str data271[] = "Dave Low           None   24 Hrs   24 Hrs                                       ";
  307. str data272[] = "Brad Jackson       257/1  24 Hrs   24 Hrs   PC/ST                               ";
  308. str data273[] = "Dave Williams      None   2100-01002100-0100                                    ";
  309. str data274[] = "Phillip Tate       253/21 Offline  Offline  PC/CBM/ST                           ";
  310. str data275[] = "Daron Brewood      None   24 Hrs   24 Hrs   ST oriented                         ";
  311. str data276[] = "Druin Burch        None   24 Hrs   24 Hrs   ST bias                             ";
  312. str data277[] = "Grant Burch        254/62 24 Hrs   24 Hrs   PC oriented                         ";
  313. str data278[] = "Ray Burcham        None   24 Hrs   24 Hrs                                       ";
  314. str data279[] = "Gary Hill          None   2200-08002200-0800                                    ";
  315. str data280[] = "Mike Mellor        None   24 Hrs   24 Hrs                                       ";
  316. str data281[] = "Yuri Large         None   1800-090024 Hrs   Amiga oriented                      ";
  317. str data282[] = "Tom Evans          None   1900-070024 Hrs   Interak bias                        ";
  318. str data283[] = "Brian Davis        None   1800-090024 Hrs   Features Dr Who                     ";
  319. str data284[] = "Geoff Protheroe    257/15 24 Hrs   24 Hrs                                       ";
  320. str data285[] = "John Newgas        None   24 Hrs   24 Hrs   PC/Pegasus                          ";
  321. str data286[] = "Mike Davies        254/79 24 Hrs   24 Hrs   Subscription for full access/PC/Z88 ";
  322. str data287[] = "Nigel Spicer       None   0730-1830Offline                                      ";
  323. str data288[] = "Mike Hughes        None   1800-08001300-0800                                    ";
  324. str data289[] = "George Young       None   24 Hrs   24 Hrs                                       ";
  325. str data290[] = "Geoff Cox          None   24 Hrs   24 Hrs                                       ";
  326. str data291[] = "Alan Davey         None   Offline  24 Hrs   Specialises in TI and Einstein      ";
  327. str data292[] = "Jerry Mallett      256/1611800-080024 Hrs   Amstrad inc PCW/BBC/CPM             ";
  328. str data293[] = "James Partner      None   2200-07002200-0700ST bias                             ";
  329. str data294[] = "Martin Smith       None   24 Hrs   24 Hrs   PC/ST/Amiga/Atari                   ";
  330. str data295[] = "John Burden        255/12 24 Hrs   24 Hrs   Christian board/Most machines       ";
  331. str data296[] = "Andrew Bessant     255/11324 Hrs   24 Hrs   Christian board/PC/Apricot/BBC/ST   ";
  332. str data297[] = "Pete Franchi       253/15724 Hrs   24 Hrs   TRS/BBC/CPM/Atari/Amstrad/ST/PC     ";
  333. str data298[] = "Steve Edwards      254/16 24 Hrs   24 Hrs   Atari 8-bit and ST                  ";
  334. str data299[] = "Robin Nicholas     None   24 Hrs   24 Hrs   Typesetting and DTP                 ";
  335. str data300[] = "Roger Fillary      None   24 Hrs   24 Hrs                                       ";
  336. str data301[] = "Martin Wybold      None   24 Hrs   24 Hrs   Most machines                       ";
  337. str data302[] = "Warren Fabes       251/19524 Hrs   24 Hrs   PC oriented                         ";
  338. str data303[] = "Tim Boorman        None   24 Hrs   24 Hrs                                       ";
  339. str data304[] = "Eddy Ralphson      254/15324 Hrs   24 Hrs                                       ";
  340. str data305[] = "Chris Conyon       None   0800-23000800-2300Einstein oriented                   ";
  341. str data306[] = "Richard Darnell    257/17224 Hrs   24 Hrs   PC/Amiga/ST                         ";
  342. str data307[] = "Allan Cooke        None   2200-07002200-0700ST bias                             ";
  343. str data308[] = "Mike Fudge         251/22 24 Hrs   24 Hrs   PC/CPM/Amstrad                      ";
  344. str data309[] = "Alex Bligh         None   1800-09001800-0900                                    ";
  345. str data310[] = "Bill Gardner       None   24 Hrs   24 Hrs   CPM/PC/CBM/ST                       ";
  346. str data311[] = "Thomas Woodley     None   24 Hrs   24 Hrs                                       ";
  347. str data312[] = "Tony Kaye          None   24 Hrs   24 Hrs   Specialises in Z88                  ";
  348. str data313[] = "Hugo Fiennes       None   24 Hrs   24 Hrs   Amiga/Archie/ST                     ";
  349.  
  350.  
  351.  
  352. /////////////////////////  PROGRAM ROUTINE  /////////////////////////////////
  353.  
  354. main ()
  355. {
  356.  
  357. start:
  358.      clear_scr();
  359.      box(3, 0, 35, 5, 2, 0, 31);
  360.      pstraxy("Enter Directory Number: ", 5, 2, 31);
  361.      pstraxy(exit, 5, 4, 27);
  362.      getsxy(dnum, 3, 29, 2, 31);
  363.  
  364.  
  365.      if(dnum == "") goto end;
  366.  
  367.  
  368.      if (stoi(dnum) < 1) goto start;
  369.      if (stoi(dnum) > 313) goto start;
  370.  
  371.      clear_scr();
  372.      box(0, 0, 55, 11, 2, 0, 30);
  373.  
  374.      if (stoi(dnum) > 300) goto block6;
  375.      if (stoi(dnum) > 250) goto block5;
  376.      if (stoi(dnum) > 200) goto block4;
  377.      if (stoi(dnum) > 150) goto block3;
  378.      if (stoi(dnum) > 100) goto block2;
  379.      if (stoi(dnum) >  50) goto block1;
  380.  
  381. block0:
  382.      if (dnum == "1")
  383.        {
  384.           data = data1;
  385.        }
  386.      else if (dnum == "2")
  387.        {
  388.           data = data2;
  389.        }
  390.      else if (dnum == "3")
  391.        {
  392.           data = data3;
  393.        }
  394.      else if (dnum == "4")
  395.        {
  396.           data = data4;
  397.        }
  398.      else if (dnum == "5")
  399.        {
  400.           data = data5;
  401.        }
  402.      else if (dnum == "6")
  403.        {
  404.           data = data6;
  405.        }
  406.      else if (dnum == "7")
  407.        {
  408.           data = data7;
  409.        }
  410.      else if (dnum == "8")
  411.        {
  412.           data = data8;
  413.        }
  414.      else if (dnum == "9")
  415.        {
  416.           data = data9;
  417.        }
  418.      else if (dnum == "10")
  419.        {
  420.           data = data10;
  421.        }
  422.      else if (dnum == "12")
  423.        {
  424.           data = data12;
  425.        }
  426.      else if (dnum == "13")
  427.        {
  428.           data = data13;
  429.        }
  430.      else if (dnum == "14")
  431.        {
  432.           data = data14;
  433.        }
  434.      else if (dnum == "18")
  435.        {
  436.           data = data18;
  437.        }
  438.      else if (dnum == "19")
  439.        {
  440.           data = data19;
  441.        }
  442.      else if (dnum == "20")
  443.        {
  444.           data = data20;
  445.        }
  446.      else if (dnum == "21")
  447.        {
  448.           data = data21;
  449.        }
  450.      else if (dnum == "22")
  451.        {
  452.           data = data22;
  453.        }
  454.      else if (dnum == "23")
  455.        {
  456.           data = data23;
  457.        }
  458.      else if (dnum == "24")
  459.        {
  460.           data = data24;
  461.        }
  462.      else if (dnum == "25")
  463.        {
  464.           data = data25;
  465.        }
  466.      else if (dnum == "26")
  467.        {
  468.           data = data26;
  469.        }
  470.      else if (dnum == "27")
  471.        {
  472.           data = data27;
  473.        }
  474.      else if (dnum == "29")
  475.        {
  476.           data = data29;
  477.        }
  478.      else if (dnum == "30")
  479.        {
  480.           data = data30;
  481.        }
  482.      else if (dnum == "31")
  483.        {
  484.           data = data31;
  485.        }
  486.      else if (dnum == "32")
  487.        {
  488.           data = data32;
  489.        }
  490.      else if (dnum == "33")
  491.        {
  492.           data = data33;
  493.        }
  494.      else if (dnum == "34")
  495.        {
  496.           data = data34;
  497.        }
  498.      else if (dnum == "35")
  499.        {
  500.           data = data35;
  501.        }
  502.      else if (dnum == "36")
  503.        {
  504.           data = data36;
  505.        }
  506.      else if (dnum == "37")
  507.        {
  508.           data = data37;
  509.        }
  510.      else if (dnum == "39")
  511.        {
  512.           data = data39;
  513.        }
  514.      else if (dnum == "40")
  515.        {
  516.           data = data40;
  517.        }
  518.      else if (dnum == "41")
  519.        {
  520.           data = data41;
  521.        }
  522.      else if (dnum == "42")
  523.        {
  524.           data = data42;
  525.        }
  526.      else if (dnum == "43")
  527.        {
  528.           data = data43;
  529.        }
  530.      else if (dnum == "45")
  531.        {
  532.           data = data45;
  533.        }
  534.      else if (dnum == "46")
  535.        {
  536.           data = data46;
  537.        }
  538.      else if (dnum == "47")
  539.        {
  540.           data = data47;
  541.        }
  542.      else if (dnum == "48")
  543.        {
  544.           data = data48;
  545.        }
  546.      else if (dnum == "49")
  547.        {
  548.           data = data49;
  549.        }
  550.      else if (dnum == "50")
  551.        {
  552.           data = data50;
  553.        }
  554.        goto display;
  555.  
  556. block1:
  557.      if (dnum == "51")
  558.        {
  559.           data = data51;
  560.        }
  561.      else if (dnum == "52")
  562.        {
  563.           data = data52;
  564.        }
  565.      else if (dnum == "53")
  566.        {
  567.           data = data53;
  568.        }
  569.      else if (dnum == "54")
  570.        {
  571.           data = data54;
  572.        }
  573.      else if (dnum == "55")
  574.        {
  575.           data = data55;
  576.        }
  577.      else if (dnum == "56")
  578.        {
  579.           data = data56;
  580.        }
  581.      else if (dnum == "57")
  582.        {
  583.           data = data57;
  584.        }
  585.      else if (dnum == "58")
  586.        {
  587.           data = data58;
  588.        }
  589.      else if (dnum == "59")
  590.        {
  591.           data = data59;
  592.        }
  593.      else if (dnum == "60")
  594.        {
  595.           data = data60;
  596.        }
  597.      else if (dnum == "61")
  598.        {
  599.           data = data61;
  600.        }
  601.      else if (dnum == "63")
  602.        {
  603.           data = data63;
  604.        }
  605.      else if (dnum == "64")
  606.        {
  607.           data = data64;
  608.        }
  609.      else if (dnum == "65")
  610.        {
  611.           data = data65;
  612.        }
  613.      else if (dnum == "66")
  614.        {
  615.           data = data66;
  616.        }
  617.      else if (dnum == "67")
  618.        {
  619.           data = data67;
  620.        }
  621.      else if (dnum == "68")
  622.        {
  623.           data = data68;
  624.        }
  625.      else if (dnum == "69")
  626.        {
  627.           data = data69;
  628.        }
  629.      else if (dnum == "70")
  630.        {
  631.           data = data70;
  632.        }
  633.      else if (dnum == "71")
  634.        {
  635.           data = data71;
  636.        }
  637.      else if (dnum == "72")
  638.        {
  639.           data = data72;
  640.        }
  641.      else if (dnum == "73")
  642.        {
  643.           data = data73;
  644.        }
  645.      else if (dnum == "74")
  646.        {
  647.           data = data74;
  648.        }
  649.      else if (dnum == "75")
  650.        {
  651.           data = data75;
  652.        }
  653.      else if (dnum == "76")
  654.        {
  655.           data = data76;
  656.        }
  657.      else if (dnum == "77")
  658.        {
  659.           data = data77;
  660.        }
  661.      else if (dnum == "78")
  662.        {
  663.           data = data78;
  664.        }
  665.      else if (dnum == "79")
  666.        {
  667.           data = data79;
  668.        }
  669.      else if (dnum == "80")
  670.        {
  671.           data = data80;
  672.        }
  673.      else if (dnum == "81")
  674.        {
  675.           data = data81;
  676.        }
  677.      else if (dnum == "82")
  678.        {
  679.           data = data82;
  680.        }
  681.      else if (dnum == "84")
  682.        {
  683.           data = data84;
  684.        }
  685.      else if (dnum == "85")
  686.        {
  687.           data = data85;
  688.        }
  689.      else if (dnum == "86")
  690.        {
  691.           data = data86;
  692.        }
  693.      else if (dnum == "87")
  694.        {
  695.           data = data87;
  696.        }
  697.      else if (dnum == "88")
  698.        {
  699.           data = data88;
  700.        }
  701.      else if (dnum == "89")
  702.        {
  703.           data = data89;
  704.        }
  705.      else if (dnum == "90")
  706.        {
  707.           data = data90;
  708.        }
  709.      else if (dnum == "91")
  710.        {
  711.           data = data91;
  712.        }
  713.      else if (dnum == "92")
  714.        {
  715.           data = data92;
  716.        }
  717.      else if (dnum == "93")
  718.        {
  719.           data = data93;
  720.        }
  721.      else if (dnum == "94")
  722.        {
  723.           data = data94;
  724.        }
  725.      else if (dnum == "95")
  726.        {
  727.           data = data95;
  728.        }
  729.      else if (dnum == "96")
  730.        {
  731.           data = data96;
  732.        }
  733.      else if (dnum == "97")
  734.        {
  735.           data = data97;
  736.        }
  737.      else if (dnum == "98")
  738.        {
  739.           data = data98;
  740.        }
  741.      else if (dnum == "99")
  742.        {
  743.           data = data99;
  744.        }
  745.      else if (dnum == "100")
  746.        {
  747.           data = data100;
  748.        }
  749.      goto display;
  750.  
  751. block2:
  752.      if (dnum == "101")
  753.        {
  754.           data = data101;
  755.        }
  756.      else if (dnum == "102")
  757.        {
  758.           data = data102;
  759.        }
  760.      else if (dnum == "103")
  761.        {
  762.           data = data103;
  763.        }
  764.      else if (dnum == "104")
  765.        {
  766.           data = data104;
  767.        }
  768.      else if (dnum == "106")
  769.        {
  770.           data = data106;
  771.        }
  772.      else if (dnum == "107")
  773.        {
  774.           data = data107;
  775.        }
  776.      else if (dnum == "108")
  777.        {
  778.           data = data108;
  779.        }
  780.      else if (dnum == "109")
  781.        {
  782.           data = data109;
  783.        }
  784.      else if (dnum == "110")
  785.        {
  786.           data = data110;
  787.        }
  788.      else if (dnum == "111")
  789.        {
  790.           data = data111;
  791.        }
  792.      else if (dnum == "112")
  793.        {
  794.           data = data112;
  795.        }
  796.      else if (dnum == "113")
  797.        {
  798.           data = data113;
  799.        }
  800.      else if (dnum == "114")
  801.        {
  802.           data = data114;
  803.        }
  804.      else if (dnum == "115")
  805.        {
  806.           data = data115;
  807.        }
  808.      else if (dnum == "116")
  809.        {
  810.           data = data116;
  811.        }
  812.      else if (dnum == "118")
  813.        {
  814.           data = data118;
  815.        }
  816.      else if (dnum == "119")
  817.        {
  818.           data = data119;
  819.        }
  820.      else if (dnum == "120")
  821.        {
  822.           data = data120;
  823.        }
  824.      else if (dnum == "121")
  825.        {
  826.           data = data121;
  827.        }
  828.      else if (dnum == "122")
  829.        {
  830.           data = data122;
  831.        }
  832.      else if (dnum == "123")
  833.        {
  834.           data = data123;
  835.        }
  836.      else if (dnum == "124")
  837.        {
  838.           data = data124;
  839.        }
  840.      else if (dnum == "126")
  841.        {
  842.           data = data126;
  843.        }
  844.      else if (dnum == "127")
  845.        {
  846.           data = data127;
  847.        }
  848.      else if (dnum == "128")
  849.        {
  850.           data = data128;
  851.        }
  852.      else if (dnum == "129")
  853.        {
  854.           data = data129;
  855.        }
  856.      else if (dnum == "130")
  857.        {
  858.           data = data130;
  859.        }
  860.      else if (dnum == "131")
  861.        {
  862.           data = data131;
  863.        }
  864.      else if (dnum == "132")
  865.        {
  866.           data = data132;
  867.        }
  868.      else if (dnum == "133")
  869.        {
  870.           data = data133;
  871.        }
  872.      else if (dnum == "134")
  873.        {
  874.           data = data134;
  875.        }
  876.      else if (dnum == "135")
  877.        {
  878.           data = data135;
  879.        }
  880.      else if (dnum == "136")
  881.        {
  882.           data = data136;
  883.        }
  884.      else if (dnum == "137")
  885.        {
  886.           data = data137;
  887.        }
  888.      else if (dnum == "138")
  889.        {
  890.           data = data138;
  891.        }
  892.      else if (dnum == "139")
  893.        {
  894.           data = data139;
  895.        }
  896.      else if (dnum == "140")
  897.        {
  898.           data = data140;
  899.        }
  900.      else if (dnum == "141")
  901.        {
  902.           data = data141;
  903.        }
  904.      else if (dnum == "143")
  905.        {
  906.           data = data143;
  907.        }
  908.      else if (dnum == "144")
  909.        {
  910.           data = data144;
  911.        }
  912.      else if (dnum == "145")
  913.        {
  914.           data = data145;
  915.        }
  916.      else if (dnum == "146")
  917.        {
  918.           data = data146;
  919.        }
  920.      else if (dnum == "147")
  921.        {
  922.           data = data147;
  923.        }
  924.      else if (dnum == "148")
  925.        {
  926.           data = data148;
  927.        }
  928.      else if (dnum == "149")
  929.        {
  930.           data = data149;
  931.        }
  932.      else if (dnum == "150")
  933.        {
  934.           data = data150;
  935.        }
  936.        goto display;
  937.  
  938. block3:
  939.      if (dnum == "151")
  940.        {
  941.           data = data151;
  942.        }
  943.      else if (dnum == "152")
  944.        {
  945.           data = data152;
  946.        }
  947.      else if (dnum == "154")
  948.        {
  949.           data = data154;
  950.        }
  951.      else if (dnum == "155")
  952.        {
  953.           data = data155;
  954.        }
  955.      else if (dnum == "156")
  956.        {
  957.           data = data156;
  958.        }
  959.      else if (dnum == "157")
  960.        {
  961.           data = data157;
  962.        }
  963.      else if (dnum == "158")
  964.        {
  965.           data = data158;
  966.        }
  967.      else if (dnum == "159")
  968.        {
  969.           data = data159;
  970.        }
  971.      else if (dnum == "160")
  972.        {
  973.           data = data160;
  974.        }
  975.      else if (dnum == "161")
  976.        {
  977.           data = data161;
  978.        }
  979.      else if (dnum == "162")
  980.        {
  981.           data = data162;
  982.        }
  983.      else if (dnum == "163")
  984.        {
  985.           data = data163;
  986.        }
  987.      else if (dnum == "164")
  988.        {
  989.           data = data164;
  990.        }
  991.      else if (dnum == "165")
  992.        {
  993.           data = data165;
  994.        }
  995.      else if (dnum == "166")
  996.        {
  997.           data = data166;
  998.        }
  999.      else if (dnum == "167")
  1000.        {
  1001.           data = data167;
  1002.        }
  1003.      else if (dnum == "168")
  1004.        {
  1005.           data = data168;
  1006.        }
  1007.      else if (dnum == "169")
  1008.        {
  1009.           data = data169;
  1010.        }
  1011.      else if (dnum == "170")
  1012.        {
  1013.           data = data170;
  1014.        }
  1015.      else if (dnum == "171")
  1016.        {
  1017.           data = data171;
  1018.        }
  1019.      else if (dnum == "173")
  1020.        {
  1021.           data = data173;
  1022.        }
  1023.      else if (dnum == "174")
  1024.        {
  1025.           data = data174;
  1026.        }
  1027.      else if (dnum == "175")
  1028.        {
  1029.           data = data175;
  1030.        }
  1031.      else if (dnum == "176")
  1032.        {
  1033.           data = data176;
  1034.        }
  1035.      else if (dnum == "178")
  1036.        {
  1037.           data = data178;
  1038.        }
  1039.      else if (dnum == "179")
  1040.        {
  1041.           data = data179;
  1042.        }
  1043.      else if (dnum == "180")
  1044.        {
  1045.           data = data180;
  1046.        }
  1047.      else if (dnum == "181")
  1048.        {
  1049.           data = data181;
  1050.        }
  1051.      else if (dnum == "182")
  1052.        {
  1053.           data = data182;
  1054.        }
  1055.      else if (dnum == "183")
  1056.        {
  1057.           data = data183;
  1058.        }
  1059.      else if (dnum == "184")
  1060.        {
  1061.           data = data184;
  1062.        }
  1063.      else if (dnum == "185")
  1064.        {
  1065.           data = data185;
  1066.        }
  1067.      else if (dnum == "186")
  1068.        {
  1069.           data = data186;
  1070.        }
  1071.      else if (dnum == "187")
  1072.        {
  1073.           data = data187;
  1074.        }
  1075.      else if (dnum == "188")
  1076.        {
  1077.           data = data188;
  1078.        }
  1079.      else if (dnum == "189")
  1080.        {
  1081.           data = data189;
  1082.        }
  1083.      else if (dnum == "190")
  1084.        {
  1085.           data = data190;
  1086.        }
  1087.      else if (dnum == "191")
  1088.        {
  1089.           data = data191;
  1090.        }
  1091.      else if (dnum == "192")
  1092.        {
  1093.           data = data192;
  1094.        }
  1095.      else if (dnum == "193")
  1096.        {
  1097.           data = data193;
  1098.        }
  1099.      else if (dnum == "194")
  1100.        {
  1101.           data = data194;
  1102.        }
  1103.      else if (dnum == "195")
  1104.        {
  1105.           data = data195;
  1106.        }
  1107.      else if (dnum == "196")
  1108.        {
  1109.           data = data196;
  1110.        }
  1111.      else if (dnum == "197")
  1112.        {
  1113.           data = data197;
  1114.        }
  1115.      else if (dnum == "198")
  1116.        {
  1117.           data = data198;
  1118.        }
  1119.      else if (dnum == "199")
  1120.        {
  1121.           data = data199;
  1122.        }
  1123.      else if (dnum == "200")
  1124.        {
  1125.           data = data200;
  1126.        }
  1127.        goto display;
  1128.  
  1129. block4:
  1130.      if (dnum == "201")
  1131.        {
  1132.           data = data201;
  1133.        }
  1134.      else if (dnum == "202")
  1135.        {
  1136.           data = data202;
  1137.        }
  1138.      else if (dnum == "203")
  1139.        {
  1140.           data = data203;
  1141.        }
  1142.      else if (dnum == "204")
  1143.        {
  1144.           data = data204;
  1145.        }
  1146.      else if (dnum == "205")
  1147.        {
  1148.           data = data205;
  1149.        }
  1150.      else if (dnum == "206")
  1151.        {
  1152.           data = data206;
  1153.        }
  1154.      else if (dnum == "207")
  1155.        {
  1156.           data = data207;
  1157.        }
  1158.      else if (dnum == "208")
  1159.        {
  1160.           data = data208;
  1161.        }
  1162.      else if (dnum == "209")
  1163.        {
  1164.           data = data209;
  1165.        }
  1166.      else if (dnum == "210")
  1167.        {
  1168.           data = data210;
  1169.        }
  1170.      else if (dnum == "211")
  1171.        {
  1172.           data = data211;
  1173.        }
  1174.      else if (dnum == "212")
  1175.        {
  1176.           data = data212;
  1177.        }
  1178.      else if (dnum == "213")
  1179.        {
  1180.           data = data213;
  1181.        }
  1182.      else if (dnum == "214")
  1183.        {
  1184.           data = data214;
  1185.        }
  1186.      else if (dnum == "215")
  1187.        {
  1188.           data = data215;
  1189.        }
  1190.      else if (dnum == "216")
  1191.        {
  1192.           data = data216;
  1193.        }
  1194.      else if (dnum == "217")
  1195.        {
  1196.           data = data217;
  1197.        }
  1198.      else if (dnum == "218")
  1199.        {
  1200.           data = data218;
  1201.        }
  1202.      else if (dnum == "219")
  1203.        {
  1204.           data = data219;
  1205.        }
  1206.      else if (dnum == "220")
  1207.        {
  1208.           data = data220;
  1209.        }
  1210.      else if (dnum == "221")
  1211.        {
  1212.           data = data221;
  1213.        }
  1214.      else if (dnum == "222")
  1215.        {
  1216.           data = data222;
  1217.        }
  1218.      else if (dnum == "223")
  1219.        {
  1220.           data = data223;
  1221.        }
  1222.      else if (dnum == "224")
  1223.        {
  1224.           data = data224;
  1225.        }
  1226.      else if (dnum == "225")
  1227.        {
  1228.           data = data225;
  1229.        }
  1230.      else if (dnum == "226")
  1231.        {
  1232.           data = data226;
  1233.        }
  1234.      else if (dnum == "227")
  1235.        {
  1236.           data = data227;
  1237.        }
  1238.      else if (dnum == "228")
  1239.        {
  1240.           data = data228;
  1241.        }
  1242.      else if (dnum == "229")
  1243.        {
  1244.           data = data229;
  1245.        }
  1246.      else if (dnum == "230")
  1247.        {
  1248.           data = data230;
  1249.        }
  1250.      else if (dnum == "231")
  1251.        {
  1252.           data = data231;
  1253.        }
  1254.      else if (dnum == "232")
  1255.        {
  1256.           data = data232;
  1257.        }
  1258.      else if (dnum == "233")
  1259.        {
  1260.           data = data233;
  1261.        }
  1262.      else if (dnum == "234")
  1263.        {
  1264.           data = data234;
  1265.        }
  1266.      else if (dnum == "235")
  1267.        {
  1268.           data = data235;
  1269.        }
  1270.      else if (dnum == "236")
  1271.        {
  1272.           data = data236;
  1273.        }
  1274.      else if (dnum == "237")
  1275.        {
  1276.           data = data237;
  1277.        }
  1278.      else if (dnum == "238")
  1279.        {
  1280.           data = data238;
  1281.        }
  1282.      else if (dnum == "239")
  1283.        {
  1284.           data = data239;
  1285.        }
  1286.      else if (dnum == "240")
  1287.        {
  1288.           data = data240;
  1289.        }
  1290.      else if (dnum == "241")
  1291.        {
  1292.           data = data241;
  1293.        }
  1294.      else if (dnum == "242")
  1295.        {
  1296.           data = data242;
  1297.        }
  1298.      else if (dnum == "243")
  1299.        {
  1300.           data = data243;
  1301.        }
  1302.      else if (dnum == "244")
  1303.        {
  1304.           data = data244;
  1305.        }
  1306.      else if (dnum == "245")
  1307.        {
  1308.           data = data245;
  1309.        }
  1310.      else if (dnum == "246")
  1311.        {
  1312.           data = data246;
  1313.        }
  1314.      else if (dnum == "247")
  1315.        {
  1316.           data = data247;
  1317.        }
  1318.      else if (dnum == "248")
  1319.        {
  1320.           data = data248;
  1321.        }
  1322.      else if (dnum == "249")
  1323.        {
  1324.           data = data249;
  1325.        }
  1326.      else if (dnum == "250")
  1327.        {
  1328.           data = data250;
  1329.        }
  1330.        goto display;
  1331.  
  1332. block5:
  1333.      if (dnum == "251")
  1334.        {
  1335.           data = data251;
  1336.        }
  1337.      else if (dnum == "252")
  1338.        {
  1339.           data = data252;
  1340.        }
  1341.      else if (dnum == "253")
  1342.        {
  1343.           data = data253;
  1344.        }
  1345.      else if (dnum == "254")
  1346.        {
  1347.           data = data254;
  1348.        }
  1349.      else if (dnum == "255")
  1350.        {
  1351.           data = data255;
  1352.        }
  1353.      else if (dnum == "256")
  1354.        {
  1355.           data = data256;
  1356.        }
  1357.      else if (dnum == "257")
  1358.        {
  1359.           data = data257;
  1360.        }
  1361.      else if (dnum == "258")
  1362.        {
  1363.           data = data258;
  1364.        }
  1365.      else if (dnum == "259")
  1366.        {
  1367.           data = data259;
  1368.        }
  1369.      else if (dnum == "260")
  1370.        {
  1371.           data = data260;
  1372.        }
  1373.      else if (dnum == "261")
  1374.        {
  1375.           data = data261;
  1376.        }
  1377.      else if (dnum == "262")
  1378.        {
  1379.           data = data262;
  1380.        }
  1381.      else if (dnum == "263")
  1382.        {
  1383.           data = data263;
  1384.        }
  1385.      else if (dnum == "264")
  1386.        {
  1387.           data = data264;
  1388.        }
  1389.      else if (dnum == "265")
  1390.        {
  1391.           data = data265;
  1392.        }
  1393.      else if (dnum == "266")
  1394.        {
  1395.           data = data266;
  1396.        }
  1397.      else if (dnum == "267")
  1398.        {
  1399.           data = data267;
  1400.        }
  1401.      else if (dnum == "268")
  1402.        {
  1403.           data = data268;
  1404.        }
  1405.      else if (dnum == "269")
  1406.        {
  1407.           data = data269;
  1408.        }
  1409.      else if (dnum == "270")
  1410.        {
  1411.           data = data270;
  1412.        }
  1413.      else if (dnum == "271")
  1414.        {
  1415.           data = data271;
  1416.        }
  1417.      else if (dnum == "272")
  1418.        {
  1419.           data = data272;
  1420.        }
  1421.      else if (dnum == "273")
  1422.        {
  1423.           data = data273;
  1424.        }
  1425.      else if (dnum == "274")
  1426.        {
  1427.           data = data274;
  1428.        }
  1429.      else if (dnum == "275")
  1430.        {
  1431.           data = data275;
  1432.        }
  1433.      else if (dnum == "276")
  1434.        {
  1435.           data = data276;
  1436.        }
  1437.      else if (dnum == "277")
  1438.        {
  1439.           data = data277;
  1440.        }
  1441.      else if (dnum == "278")
  1442.        {
  1443.           data = data278;
  1444.        }
  1445.      else if (dnum == "279")
  1446.        {
  1447.           data = data279;
  1448.        }
  1449.      else if (dnum == "280")
  1450.        {
  1451.           data = data280;
  1452.        }
  1453.      else if (dnum == "281")
  1454.        {
  1455.           data = data281;
  1456.        }
  1457.      else if (dnum == "282")
  1458.        {
  1459.           data = data282;
  1460.        }
  1461.      else if (dnum == "283")
  1462.        {
  1463.           data = data283;
  1464.        }
  1465.      else if (dnum == "284")
  1466.        {
  1467.           data = data284;
  1468.        }
  1469.      else if (dnum == "285")
  1470.        {
  1471.           data = data285;
  1472.        }
  1473.      else if (dnum == "286")
  1474.        {
  1475.           data = data286;
  1476.        }
  1477.      else if (dnum == "287")
  1478.        {
  1479.           data = data287;
  1480.        }
  1481.      else if (dnum == "288")
  1482.        {
  1483.           data = data288;
  1484.        }
  1485.      else if (dnum == "289")
  1486.        {
  1487.           data = data289;
  1488.        }
  1489.      else if (dnum == "290")
  1490.        {
  1491.           data = data290;
  1492.        }
  1493.      else if (dnum == "291")
  1494.        {
  1495.           data = data291;
  1496.        }
  1497.      else if (dnum == "292")
  1498.        {
  1499.           data = data292;
  1500.        }
  1501.      else if (dnum == "293")
  1502.        {
  1503.           data = data293;
  1504.        }
  1505.      else if (dnum == "294")
  1506.        {
  1507.           data = data294;
  1508.        }
  1509.      else if (dnum == "295")
  1510.        {
  1511.           data = data295;
  1512.        }
  1513.      else if (dnum == "296")
  1514.        {
  1515.           data = data296;
  1516.        }
  1517.      else if (dnum == "297")
  1518.        {
  1519.           data = data297;
  1520.        }
  1521.      else if (dnum == "298")
  1522.        {
  1523.           data = data298;
  1524.        }
  1525.      else if (dnum == "299")
  1526.        {
  1527.           data = data299;
  1528.        }
  1529.      else if (dnum == "300")
  1530.        {
  1531.           data = data300;
  1532.        }
  1533.        goto display;
  1534.  
  1535. block6:
  1536.      if (dnum == "301")
  1537.        {
  1538.           data = data301;
  1539.        }
  1540.      else if (dnum == "302")
  1541.        {
  1542.           data = data302;
  1543.        }
  1544.      else if (dnum == "303")
  1545.        {
  1546.           data = data303;
  1547.        }
  1548.      else if (dnum == "304")
  1549.        {
  1550.           data = data304;
  1551.        }
  1552.      else if (dnum == "305")
  1553.        {
  1554.           data = data305;
  1555.        }
  1556.      else if (dnum == "306")
  1557.        {
  1558.           data = data306;
  1559.        }
  1560.      else if (dnum == "307")
  1561.        {
  1562.           data = data307;
  1563.        }
  1564.      else if (dnum == "308")
  1565.        {
  1566.           data = data308;
  1567.        }
  1568.      else if (dnum == "309")
  1569.        {
  1570.           data = data309;
  1571.        }
  1572.      else if (dnum == "310")
  1573.        {
  1574.           data = data310;
  1575.        }
  1576.      else if (dnum == "311")
  1577.        {
  1578.           data = data311;
  1579.        }
  1580.      else if (dnum == "312")
  1581.        {
  1582.           data = data312;
  1583.        }
  1584.      else if (dnum == "313")
  1585.        {
  1586.           data = data313;
  1587.        }
  1588.  
  1589.  
  1590.  
  1591. display:
  1592.  
  1593.           pstraxy(entry, 2, 1, 78);
  1594.           pstra(dnum, 79);
  1595.           substr(data, 0, 19, sname);
  1596.           pstraxy(sysop, 2, 2, 30);
  1597.           pstra(sname ,31);
  1598.           substr(data, 19, 25, snode);
  1599.           pstraxy(node, 2, 3, 30);
  1600.           pstra(snode, 31);
  1601.           substr(data, 26, 34, swdhrs);
  1602.           pstraxy(wdhrs, 2, 4, 30);
  1603.           pstra(swdhrs, 31);
  1604.           substr(data, 35, 43, swehrs);
  1605.           pstraxy(wehrs, 2, 5, 30);
  1606.           pstra(swehrs, 31);
  1607.           substr(data, 44, 79, snotes);
  1608.           pstraxy(notes, 2, 7, 30);
  1609.           pstra(snotes, 31);
  1610.           
  1611.  
  1612.  
  1613.  pstraxy(exit, 5, 9, 27);
  1614.  getsxy(endc, 1, 35, 9, 27);
  1615.  goto start;
  1616.  
  1617.  end:
  1618.  clear_scr();
  1619. }
  1620.